home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
276-300
/
disk_290
/
ipc
/
sources
/
quit.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
3KB
|
94 lines
/************************************************************
* *
* IPC "QUIT" Requestor *
* *
* Pete Goodeve 89:4:01 *
* *
* [This module has only been compiled under Lattice; *
* it will need some modification for Manx/Aztec; *
* ... I'd be very grateful if someone would do the *
* conversion...] *
* *
* *
* Invoke from the CLI with the required port names as *
* arguments (remember case is important). A simple *
* QUIT message (no optional items) will be sent to each *
* in turn. *
* *
************************************************************/
#ifdef LATTICE
#if LATTICE_40 | LATTICE_50
#include "IPC_proto.h"
/* ...else (not recent Lattice) will need library linkage stubs (IPC.o) */
#include <proto/exec.h>
#endif
#endif
#include "IPC.h"
/*
* Define the ID codes recognized by the print format server
*
* (MAKE_ID is defined in IPC.h)
*/
/* Message IDs: */
#define QUIT MAKE_ID('Q','U','I','T')
struct Library * IPCBase = NULL;
struct IPCPort *port=NULL; /* will point to server port */
struct MsgPort *rport=NULL; /* where we get our replies */
struct IPCMessage *imsg=NULL; /* this one message is used repeatedly */
void Cleanup();
void main(argc,argv) char **argv;
{
/* Before anything else, we need the IPC Library: */
IPCBase = OpenLibrary("ppipc.library",0);
if (!IPCBase)
exit(20);
/* First we set up a reply port: */
rport = CreatePort(NULL,0);
if (!rport) {
Cleanup();
exit(21);
}
/* ... then make a message block */
imsg = CreateIPCMsg(0,0,rport);
if (!imsg) {Cleanup(); exit(22);}
imsg->ipc_Id = QUIT;
/* then send a QUIT to every port in the command line: */
argv++;
while(--argc > 0) {
port = GetIPCPort(*argv);
if (!port) continue; /* ignore unrecognized arguments */
if (PutIPCMsg(port, imsg)) {
WaitPort(rport);
GetMsg(rport);
}
DropIPCPort(port);
argv++;
}
Cleanup();
}
void Cleanup()
{
if (rport) DeletePort(rport);
if (imsg) DeleteIPCMsg(imsg);
CloseLibrary(IPCBase);
}